home *** CD-ROM | disk | FTP | other *** search
/ The PC-SIG Library 9 / The PC-SIG Library on CD ROM - Ninth Edition.iso / 001_100 / DISK0082 / DISK0082.ZIP / _FUNKY.BAT < prev    next >
DOS Batch File  |  1983-08-21  |  2KB  |  55 lines
  1. echo off
  2. .                               _funky.bat      revised 16-aug-83  21:00
  3. more <_funky.rem
  4. slash/l
  5. pause
  6. :example
  7. slash/lll/
  8. echo    F1      Batch Files are useful and increase productivity
  9. echo    F2      Batch Files are unfathomable and a general pain.
  10. echo    F3      Batch Files are @#$%#$@% !!!
  11. funky/llb/              Please select one of the above :
  12. if not errorlevel 1 goto esc
  13. if not errorlevel 59 goto below
  14. if errorlevel 255 goto non_ext
  15. if errorlevel 62 goto higher
  16. if errorlevel 61 goto f3_typed
  17. if errorlevel 60 goto f2_typed
  18. echo    You pressed F1.  I find them useful, too!
  19. goto continue
  20. :esc
  21. echo    You pressed ESC.  Are you trying to sneak out?
  22. goto continue
  23. :below
  24. echo    You pressed a key with an extended code below 59.
  25. goto continue
  26. :non_ext
  27. echo    You pressed a non-extended key.
  28. goto continue
  29. :higher
  30. echo    You pressed a key with an extended code above 61
  31. goto continue
  32. :f3_typed
  33. echo    Now, now.  It's not THAT bad.
  34. goto continue
  35. :f2_typed
  36. echo    Well, I felt that way until I wrote these utilities ...
  37. :continue
  38. query /lll/     Would you like to execute this example again (y/n) ?
  39. if errorlevel 2 goto exit
  40. if errorlevel 1 goto example
  41. slash/lll/      A list of extended keycodes is in file EXTCODES.REM
  42. query/  l/      Would you like to see them now (y/n) ?
  43. if errorlevel 2 goto exit
  44. if not errorlevel 1 goto doslash
  45. more <extcodes.rem
  46. slash/ll
  47. pause
  48. :doslash
  49. more <_slash.rem
  50. slash/ll
  51. pause
  52. _what
  53. :exit
  54. slash/ll/               Bye bye
  55.